home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / prog / mod2tutb.zip / GOODFORM.MOD < prev    next >
Text File  |  1989-01-18  |  694b  |  32 lines

  1. MODULE GoodForm;
  2.  
  3. FROM InOut IMPORT WriteLn, WriteString;
  4.  
  5. BEGIN
  6.  
  7.    WriteString("Programming style ");
  8.    WriteString                  ("is a matter of ");
  9.    WriteString                                 ("personal choice.");
  10.    WriteLn;
  11.    WriteString("Each person ");
  12.    WriteString            ("can choose ");
  13.    WriteString                       ("his own style.");
  14.    WriteLn;
  15.    WriteString("He can be ");
  16.    WriteString          ("very clear, or extremely messy.");
  17.    WriteLn;
  18.  
  19. END GoodForm.
  20.  
  21.  
  22.  
  23.  
  24. (* Result of execution
  25.  
  26. Programming style is a matter of personal choice.
  27. Each person can choose his own style.
  28. He can be very clear, or extremely messy.
  29.  
  30. *)
  31.  
  32.